Developer CD Series 1995 August: Tool Chest

home *** CD-ROM | disk | FTP | other *** search

/ Developer CD Series 1995 August: Tool Chest / Dev.CD Aug 95 TC / Dev.CD Aug 95 TC.toast / Tool Chest / Development Tools & Languages / Dylan Related / Mindy / Mindy 1.2 - Mac PPC / lib / collection-extensions.dbc next >

Wrap

Text File | 1995-03-15 | 25.4 KB | 208 lines | [TEXT/ttxt]

# compilation (2.1) of library.dylan # produced with the 1.2 version of mindycomp nxöæ<collection-extensions> library.dylanEdylanheapself-organizing-list vector-searchsubseqF extensions<fixed-integer><heap>random-iteration-protocolF<dictionary><self-organizing-list>Ffind-first-key find-last-keyFsubsequence <subsequence>ˇ# compilation (2.1) of heap.dylan # produced with the 1.2 version of mindycomp nxöæ<collection-extensions> heap.dylan=heapD<heap> heap-sizeheap-size-setter heap-dataheap-data-setterheap-less-thanheap-less-than-setter7 Define Class <heap>*++t4%define-class-16t24list6t2<mutable-sequence>∞°≤£ëÇ$76Define Class <heap>,++u+v +w4%define-slot2222224%define-class-224 4 make-slot6u2<fixed-integer>6v2<stretchy-vector>6w2 <function>∞!"Ç∞#$Ç∞%&Ç∑®π∫+ °¢¨ï∫- £§Æï∫/ •¶ØïìπêπêÑ/C initialize7Define Method initialize)+}6}24<type>4%define-method29 size less-than72.+}** *h+)*next-method+ Ä)*+ Å + Ç+ Éapply4make-next-method-function62<6Ä26Å2make6Å26Å26Ç2∞°043î`1ı¢ 1a b≥R4Ç¥•ëb∂R4ÇQb∑R4ÇPp4 †°`≤#$µPëÇ&Cclass-for-copy7Define Method class-for-copy)+ á6á2442 97 )+ à)*6à2†4 †°`≤#$µPëÇ&Cshallow-copy7Define Method shallow-copy)+ å6å2442"97 %".+ ç)*old-heap + é )*new-heap#+ è%+ ê %+ ë%+ ë#6ç26ç26é26é26è2"6è26è26ê26ê2∞°ë`2≤a≥QPÇ¥2µëa∂QPÇ2∑a∏QPÇP04 "†°`†°a≤#Q$µPëµQëÇ&Cas7 Define Method as,++ ï + ñ+ ï4 singleton6ï246ï2<collection>42'97:' -+ ó**coll *cls + ò")**+ ô)*elem -+ õ-+ õ*6ó26ó24forward-iteration-protocol6ô2add!∞°ë`2a≤QÅgfedcbUQRSì WQRíh≥PXÇTQRíb ⁄ˇˇˇP04 '∞°ë¢`£¢a°¢b¥%R&∑PQí∑RëÇ(C7Define Method size)+ ü6ü246ü24297)+ †)* 6†22∞04 †°`¢°a≥$Q%∂Pë∂QëÇ'Cempty?7Define Method empty?)+ §6§24423973)+ •)*6•21∞ Ù4 3†°`≤#$µPëÇ&@ no-default7 Define Constant no-default)+ © no-default4 init-variable25 `±"PÉCelement7 Define Method element++ ∞+ ±+ ∞6∞244(6±2<object>4279default7870+ ±**index *+ ≤)*9:+ ≥<+ ¥<+ µ<+ ∂<+ ∏<+ π <6±256≤236¥2errorNo such element476π22ı† 2`±4ëP†ı≤#ë P ¥4µ í04 7†°`≤ ë°a£°b¥%R&∑PQí∑RëÇ(C77 Define Method element++ ¡+ ¬+ ¡6¡244(6¬28427997>70+ ¬**; *+ √)*9>+ ƒ?+ ≈?+ Δ?+ «?+ …?+ ?6¬256√26≈2=No such element476 26 2 smaller-child2ı† 2`±4ë ÚP†ı≤#ë P ¥4µ∂4 íí04 7†°`≤ ë°a£°b¥%R&∑PQí∑RëÇ(Celement-setter7 Define Method element-setter)+ ‘6‘244(42A97 A*+ ’+*;* *value + ÷B4A6’23`∞P2± É34 48A†°`≤ ë°a≥$%∂ßPQìÇ(CA7 Define Method element-setter)+ ﬂ6ﬂ246ﬂ242A97A)+ ‡+*key* *new-elt 4A6‡26‡2 find-index473`∞P2±≤2≥21ííÉP4 48A†°`¢°a≥$%∂ßPQìÇ(C17Define Method add!)+ ‰6‰2442197&1,+ Â**F * + ÊH+ Á H+ ËH4A6Â26Â26Ê26Á2upheap2`∞P3±3≤É 3≤`≥P3Ç¥33≤ ÒÇ304 481†°`†°a≤#Q$µP¶íµQëÇ'Cadd-new!7Define Method add-new!++ Ï+ Ó+ Ï6Ï2442J9test efficient7*J-+ Ì+*L *F*+ Ô )*KM+ ÚN+ ÒN+ N6Ì2=6Ô2member?KL6213ı† 3`±54"P#2ñ5 ¥54í04 48J†°`†°a≤#Q$µP¶íµQëÇ'Cpush7Define Method push)+ ˜6˜2442Q97Q)+ ¯**F * 6¯21∞32í04 48Q†°`†°a≤#Q$µP¶íµQëÇ'Cpop7Define Method pop)+ ¸6¸2442S971S0+ ¸)*+ ˝T+ ˝)* smallest-itemT+ ˛U+ U+ U+ U+ T476˝26˛24A626262downheap∞1± í`∞1±≤1ë Òía≥Q1± É1¥ ÒaµQ1Ç∂1 ÇP4 48S†°`≤#$µPëµ¶ëÇ'Cremove!7Define Method remove!++ + + 62442X9KL7X1 + +*L *elt*+ )*KY+ [+ .*cur-elt*cur-key* finished?*next*limit*init[+ )* kill-list\+ )*state$c+ e+ e+ e+ #c+ )*dead-elt<c+ )*;@g+ i+ )*old-itemDi+ j+ !j+ #)*new-itemHj+ $l+ %l+ &l+ *c+ *[6 2O62random-iteration-protocol6206214062G476262624A6#26$2I6&2W3ı† 3`2 ±5Å ≤5ÅfedcbagQhXiT5YRì )P4V5Yíí≥WV5Yííg S5YíjZh ≈ˇˇˇWh¥XÅnmlkji\XYZì ^XYíoµ5_ío∂5∑_ío5∏ Òoπ_5Ç∂5∑5∏ío∫_5∑_É∂5∑_ío5ª__íº5_Ç 5ª__íΩ5_Ç [XYíi qˇˇˇ504 48X†°`†°a≤#Q$µP¶íµQëÇ'CP7Define Method member?)+ .6.2442P9KL7:P,+ .+*L*Z *+ 1 )*Ko+ 2p+ 5.*]*^*_*`*a*bp6.2O612n6220654catch97B/+ 5)*return0*`*]*Z*K*a * *_*b+ 6s+ 6)*fs+ 7v+ 8 v+ 6 v+ ;s97t)+ 544throw∞°02s4 9 ±ê`0aQb12R3ì $4562Ríí PÅ 72RícSa ˇˇˇ4 482ı† 2`1 ±4Å ≤4Åfedcba≥SV3PR4TQ$µ¶ëq4 48P†°`≤#$µP¶íÇ'Creverse7Define Method reverse)+ B6B2442x97Qx.+ C )*+ D)*new-seqy+ D)*;$z+ E)*Z(|+ D}+ Gz6C26C2 6C2404A∞±1ë"≥1ëì`1a¥QÅgfedcb≥1ë ÒhXiUQRSì WQRíjZkµ[PYÉTQRíbY Òk[h ŒˇˇˇP4 x†°`≤#$µPëÇ&Creverse!7Define Method reverse!)+ K6K2442~97~)+ L)*6L2x∞1q4 ~†°`≤#$µPëÇ&Csort7Define Method sort)+ P6P2442Ä9 Kstable7wÄ1+ P**Å*+ Q)*Ç+ R )*KÉ+ S Ñ+ T)*{Ñ+ T)*;,Ö+ U)*Z0Ü+ Tá+ WÖ+ Y Ñ446Q26R26S26S2 6S2404A6Y2Ä6Y2KÅ∞°043î`2ı¢ 2aQ4≥ıM¥µ4ë&∑4ëìb4c∏SÅihgfed jZkWSTUì YSTíl\mπ]R[ÉVSTíd[ m]j ŒˇˇˇR∫4ª,Q-1u4 Ä†°`≤#$µPëÇ&Csort!7Define Method sort!)+ ^6^2442à97à)+ _**key-value-pairs* 6_26_2Ä∞°21s4 à†°`≤#$µPëÇ&Cparent7Define Method parent)+ h6h246h2 <integer>42ã97ã)+ i)*; 6i2floor/∞2 Ò í04 ã†°`¢°a≥$Q%∂Pë∂QëÇ'C left-child7Define Method left-child++ m+ n+ m6m2442è97è)+ o)*; 6o2*∞ 2í 04 è†°`†°a≤#Q$µPëµQëÇ&Cright-child7Define Method right-child++ s+ t+ s6s2442í97í)+ u)*; 6u2ë∞ 2í 04 í†°`†°a≤#Q$µPëµQëÇ&C@7Define Method smaller-child++ {+ |+ {6{246{242@97<@/+ }**; * + ~î+ î+ Ä î+ Åî+ Çî+ Éî6}2í6}26~2è624762∞2ë±3ëÙ≤2ë %3≥¥3µ∞2ëí¥3µ≤2ëíí∞2ë ≤2ë04 @†°`¢°a¢°b≥$R%∂PQí∂RëÇ'CI7Define Method upheap)+ ä6ä246ä242I97bI/+ ä**; * + ãï+ ç )*itemï+ é+ñ+ èñ+ êñ+ íñ476ã26é26é2ã4A∞3±2í`2 ˆ3≤P∞3±≥2ëíí ∞3±≥2ëía¥Q3±2É≥2ë0B ±ˇˇˇPa¥Q3±2ÉQ4 I†°`¢°a≥$Q%∂PQíÇ'CW7Define Method downheap)+ ò6ò246ò242W97hW/+ ò**; * + ôò+ õ)*óò+ ú,ô+ ùô+ ûô+ °ô476ô26õ2è6õ26ú26ú2@4A∞3±2í`≤2ë≥3ëÚ 3¥∞3±µ32ííPí ∞3±µ32íía∂Q3±2Éµ32í0B ´ˇˇˇPa∂Q3±2ÉQ4 W†°`¢°a≥$Q%∂PQíÇ'CG7 Define Method find-index)+ •6•246•242G97#G.+ ¶**Z * + ¶)*;ö+ ßõ+ ® õ+ ™õ+ ™ö476ß2 `∞3±Pí2ı P ` ‰ˇˇˇP04 48G†°`¢°a≥$Q%∂Pßí∂QëÇ(C07(Define Method forward-iteration-protocol)+ ¥6¥2442097 }00+ µ)*++ ∂ú+ ∏ú+ æú+ √ú+ »ú+ Õú+ ‘ú6µ2values6µ2"6∏2497*+ π**f * + ∫û6π2S∞2Å204 97)+ ø+*a*f * 6ø23∞2q486√297 )+ ƒ **f * 6ƒ23∞2∞Ò097)+ …**f* 6…2first∞1q97++ Œ+*f* *C + œ )*;£+ – §6Œ2G6Œ2¢4A6œ2∞2±1ëí`3a≤Q2≥PÉ3a≤Q1≥ ÉQ97)+ ’**f * 6’2"∞2ë0∞±1ë¢£`¢£a¢£bR$µPQíµRë¢£`¢£a&µPQßì¢£`¢£a®£bR)µPQíµRë¢£`¢£a*µPQí¢£`¢£a+µßPQì¢£`¢£a¢£bR,µPQíµRëx4 0†°`≤#$µPëÇ&Cbackwards-iteration-protocol7*Define Method backwards-iteration-protocol)+ ﬂ6ﬂ2442¶97ã¶1+ ‡)*++ ‚)* sorted-vectorß+ „®+ Â®+ Í®+ Ô®+ Ù®+ ˘®+ ®6‡2x6‚2ù6‚26Â246Â26Â2å97)+ Ê**f * 2 Ò04 97)+ Î+*a*f * 21Ù97)+ **f * 2097*+ Ù+*©*f * + ı≠47∞02r97++ ˙,*©*f * *C+ ˚ )*;Æ+ ¸ Ø6˙2G474A6˚2∞3±02íí`4a≤Q3≥PÉ4a≤Q02ÉQ4897)+ **f * 20∞1ë`±1≤ Ò ˇ£§a•§b¶§cS'∏QRí∏Së£§a•§b¶§c)∏QRSì£§a•§b¶§cS*∏QRí∏Së£§a•§bP+∏QRí£§a•§bP,∏≠QRì£§a•§b¶§cS.∏QRí∏Sëx4 ¶†°`≤#$µPëÇ&Cn7'Define Method random-iteration-protocol)+ 6 2442n97Çn0+ )* collection+ ±+ ±+ ±+ ±+ ±+ "±+ '±6 2ù626246262å97)+ **f * 2 04 97)+ +*a*f * 21Ù97)+ **f * 62='I have no idea what the current-key is.∞!ë097*+ **f* + ∂4762∞2±1r97)+ #+*f* *C 4A6#23`∞P2±1ÉP4897)+ (**f * 20∞ ±1ë¢£`§£a•£bR&∑PQí∑Rë¢£`§£a•£b(∑PQRì¢£`§£a•£bR)∑PQí∑Rë¢£`§£a*∑PQí¢£`§£a+∑¨PQì¢£`§£a•£bR-∑PQí∑Rëx4 n†°`≤#$µPëÇ&ˇ# compilation (2.1) of solist.dylan # produced with the 1.2 version of mindycomp nxöæ<collection-extensions>solist.dylan=self-organizing-listD<self-organizing-list>datadata-setterkey-testkey-test-setter7 #Define Class <self-organizing-list>*++94%define-class-16924list692<dictionary>∞°≤£ëÇ$70#Define Class <self-organizing-list>+++: +<4%define-slot22224%define-class-2244 make-slot6:2<list> init-value6<2 <function>6<2==init-keywordtest∞!"Ç∞#$Çµ¶∑∏) °¢™+ó∏, £§≠.Ø//ôí∑ê∑êÑ/@sol-fip-next-state7 "Define Constant sol-fip-next-state++@+A+@6@24<type>6@2 97)+B**state * 6B2tail∞2ë044 init-variable2†°`¢°a¢°bR#¥PQí¥Rë`µ&PÉ@sol-fip-finished-state?7'Define Constant sol-fip-finished-state?)+F6F246F2 97)+G+*limit* * 2ı44<object>42†°`¢°a#¥PQ•ì`∂'PÉ@sol-fip-current-key7 #Define Constant sol-fip-current-key++K+L+K6K246K2 6L297)+M** * 6M2head∞∞2ëë0442†°`¢°a£°bR$µPQíµRë`∂'PÉ@sol-fip-current-element7 'Define Constant sol-fip-current-element++R+S+R6R246R2 6S297)+T** * 6T26T2∞±2ëë0442 †°`¢°a£°bR$µPQíµRë`∂'PÉ@sol-fip-current-element-setter7%.Define Constant sol-fip-current-element-setter,+X+Y+Z+X6X246Y26Y2 97 )+[ +* * *value6[2tail-setter6[24`∞P±2ëÇP0442"†°`¢°a£°b†°cS$µPQRìµSë`∂'PÉ@sol-fip-copy-state7 "Define Constant sol-fip-copy-state++_+`+_6_246_2 97)+a** * 20442&†°`¢°a¢°bR#¥PQí¥Rë`µ&PÉCforward-iteration-protocol7(Define Method forward-iteration-protocol)+d6d244%define-method2(97(++e)*table+f*+g*6e2values6e26e26e26f26f2 6g2"6g2&∞1±¢£§•¶ßx4(†°`≤#$µPëÇ&@sol-no-default7 Define Constant sol-no-default)+j 6j2pair42-∞í`±"PÉCelement7Define Method element)+l6l246l24)2/9default7 2/,+m**key *+ +n )*01+o )*3+q)*46m2-6n2 46n26o26o26q4catch97 ó 1 +q)*return-*0*+ *2 **+r7+t )*first7+v:+w:+y:+z:+z)*prev:+{ )*<+|>+})*elem>+~ ?+?+ Ä?+ Å?+y?+z?+ Ü :+ á:978)+q4apply4throw∞°02s46r26w26~2%6Ä26Ü2-6Ü2errorKey %= not in %=6 ±ê`≤0ëa0ı o1≤Që2íP≥QëÅ X0b≥0ëcRdSeUı A≤Uëf1≤Vë2í"≥Uëg¥WTÇ0g¥WUÇUgµW3ÇP≥VëÅ UgWb≥UëhXc Æˇˇˇ4¶ı∑(23s4441ı† 1`°¢a3≥Qb§¢c3µSd∂P32TR'∏©ëq4/†°`¢°a≥$%∂PQíÇ'@sol-no-value7 Define Constant sol-no-value)+ å 6å2.42D∞í`±"PÉCelement-setter7 Define Method element-setter++ é+ è+ é 6é246è24)2E97+E++ ë +*2*+ *$ + ìF+ ñ F6ë2/06ë2D6ì2.6ì26ì26ñ2%6ñ2∞21!¢î¢ı≥≥13í2¥í`µP2ÇP3`∂P∑2¥ëÇP44E†°`¢°a≥$%∂ßPQìÇ(ˇ# compilation (2.1) of subseq.dylan # produced with the 1.2 version of mindycomp nxöæ<collection-extensions>subseq.dylan=subseqD <subsequence>source source-setterstart-indexstart-index-setter end-indexend-index-setter7 Define Class <subsequence>*++R4%define-class-16R24list6R2 <sequence>∞°≤£ëÇ$7BDefine Class <subsequence>,++S+T+W4%define-slot2222224%define-class-224 4 make-slot6S2required-init-keyword6T2<fixed-integer>startend∞!"Ç∞#$Ç∞%&Ç∑®π∫+ °¢¨-.ó∫/ £§Ø//ó∫/ •¶Ø//óìπêπêÑ/Csubsequence7Define Method subsequence++Z+\+Z6Z24<type>4%define-method297 -/+]+*last *first *seq+^)* old-first+_)*old-last+`+a)*subseq-last+b+b6]26^26_2min6a2make6a2object-class6a24∞`4±a2≤2PQí Qb≥¥4ë%4∂'3P(Ró04 †°`†°a≤#Q$µPëµQëÇ&Cclass-for-copy7Define Method class-for-copy)+e6e2442#97#)+f)*6f2#6f2∞1±q4 #†°`≤#$µPëÇ&D<generic-subsequence> init-stateinit-state-setterlimitlimit-setter next-statenext-state-setterfinished-state?finished-state?-settercurrent-elemcurrent-elem-settercurrent-elem-sttrcurrent-elem-sttr-setter copy-statecopy-state-setter7 "Define Class <generic-subsequence>*++i4 6i2%4 6i2%∞°≤£ëÇ$7)ó"Define Class <generic-subsequence>0+/+j+k+l+m+n+o+p42&2'2(2)2*2+2,2-2.2/202122234 2%4 4&init((*next,done.elem0elem-setter2copy%∞!"Ç∞#$Ç∞%&Ç∞'(Ç∞)*Ç∞+,Ç∞-.ÇøØøø/ °¢//óø/ £§//óø/ •¶//óø/ ß®//óø/ ©™/ /!óø/" ´¨/#/$óø/% ≠Æ/&/'óóøêøêÑ/(C7Define Method subsequence++s+v+s6s246v2%4297Ü1+w+* * *+x)*sz:+z)*;+{0*9$*8 *7*key*done?*5*(*4=+|>+|)*i4>+| )*state8A+}C+|C+~C+~>+ Ä)*D(>+ Å E+ ÇE+ Ç:6w2size6z2forward-iteration-protocol6Ä2!6Ä2%4(56789∞4ë`22PÚ2 P Pa±4Åihgfedcb j3kRlZm\n[ZÛ $U4^Sì Z jT4^ío_l Àˇˇˇ^j≤£$4%3&Q'Z(S)T*U+W,X-Yüê04 †°`¢°a≥$Q%∂Pë∂QëÇ'C7Define Method subsequence++ Ö+ á+ Ö6Ö2%44297ó 1+ à+* * *+ â)*H+ ä)*I+ ãJ+ å)*J+ ç)*K+ éL+ è+*@*5*(L+ êM+ ê)*B(M+ ê )*D,N+ ëO+ ê O+ íO+ íM+ î )*DM+ ïP+ ñP+ ó P+ óH6à26â26ä2 6å26ç2(6ç2*6é2,6ê2&6î2!6î2"4(5676ñ2.86ñ2096ó224∞`4±a2≤2PQí Qb4≥c4¥4µ4∂fed g3h4∑iWjYkXWÛ "VS[Tì W gUS[íl\i Õˇˇˇ[g∏π4ë*S+3P,R-W.T/U/V/4ø/4ø/4øüê04 †°`†°a≤#Q$µPëµQëÇ&@gs-fip-next-state7!Define Constant gs-fip-next-state)+ õ97++ ú**s*c + ùR+ ûR6ú2*6ú26ú2head6ú2head-setter6ù2tail6ù2tail-setter2∞2±≤1ëí`≥P1Ç¥1ë `µP1Ç14 4<object>4 init-variable2Q ±¢¢í`≥$PÉ@gs-fip-done?7Define Constant gs-fip-done?)+ ¢97)+ £+*l*S *T 6£2,6£26£2U6£2W6£23∞3±≤2ë1ì`PP≥2ë3¥˜4 4Y4Z2[ ±¢¢¢ì`≥$PÉ@gs-fip-current-key7"Define Constant gs-fip-current-key)+ ß97)+ ß**S*T 6ß2W6ß2∞1ë2±Ò4 4Y4Z2^ ±¢¢í`≥$PÉ@gs-fip-current-element7&Define Constant gs-fip-current-element)+ ™97)+ ™**S*T 6™2.6™26™2U2∞2±≤1ër4 4Y4Z2` ±¢¢í`≥$PÉ@gs-fip-current-element-setter7-Define Constant gs-fip-current-element-setter)+ ≠97)+ Æ+*S*T *v 6Æ2/6Æ26Æ2U2∞32±≤1ës4 4Y4Z2b ±¢¢¢ì`≥$PÉ@gs-fip-copy-state7!Define Constant gs-fip-copy-state)+ ≤97 )+ ≤ **S*T 6≤2pair6≤226≤2U6≤2W∞2±≤1ëë≥1ër4 4Y4Z2e ±¢¢í`≥$PÉCG7(Define Method forward-iteration-protocol)+ ¥6¥2%442G97G++ µ )*+ ∂h+ ∑h6µ2values6µ2g6µ2&6µ26µ2(6µ2Q6∂2[6∂2^6∂2`6∑2b6∑2e∞±1≤1≥í1¥•¶ß®©™x4 G†°`≤#$µPëÇ&D<vector-subsequence>7 !Define Class <vector-subsequence>*++ ∫ 4 6∫2j4 6∫26∫2<vector>j∞°≤£§íÇ%7!Define Class <vector-subsequence>)+4 2j4 j∞°≤ê≤ê≤êÑ#D<string-subsequence>7 !Define Class <string-subsequence>*++ ª 4 6ª2l4 6ª26ª2<string>l∞°≤£§íÇ%7!Define Class <string-subsequence>)+4 2l4 l∞°≤ê≤ê≤êÑ#D<vs-subsequence>7 Define Class <vs-subsequence>*++ ø 4 6ø2n4 6ø2l6ø2jn∞°≤£§íÇ%7Define Class <vs-subsequence>)+4 2n4 n∞°≤ê≤ê≤êÑ#C!7 Define Method make,++ ¡+ ¬+ ¡4 singleton6¡246¬2j42!97!)+ √**keys *cls 6√2apply6√2!6√2j∞°¢2ì04 !∞°ë¢`£¢a¥%Q&∑Pë∑QëÇ(C7Define Method subsequence++ Δ+ »+ Δ6Δ2k46»2j4297 8/+ …+* * *+ )*seq-sizet+ À )*u+ Ã w+ Õw+ Œ w+ Œt6…2F6 2 6À2 instance?6À2m6Ã2!6Ã2n6Œ2j∞4ë`2 ±2Pí Pa≤4£í¥•&4'3(Qó ¥©*4+3,Qó04 †°`¢°a≥$Q%∂Pë∂QëÇ'@vs-fip-next-element7 #Define Constant vs-fip-next-element)+ ” 6”246”26”2 <integer>97)+ ‘**S *T 2 04 4Z2y†°`¢°a£°bR$µPQíµRë`∂'PÉ@vs-fip-done?7Define Constant vs-fip-done?)+ ÿ6ÿ246ÿ26ÿ2z97)+ Ÿ+*]*S *T 21˜4 4Z2|†°`¢°a£°b$µPQRì`∂'PÉ@vs-fip-current-key7 "Define Constant vs-fip-current-key)+ › 6›246›26›2z97)+ ﬁ**S *T 6ﬁ223∞Ò04 4Z2~†°`¢°a£°bR$µPQíµRë`∂'PÉ@vs-fip-current-element7&Define Constant vs-fip-current-element)+ ‚6‚246‚297*+ ‚**S*T + „Å4element6„2∞2±1r4 4Z2Ä†°`¢°a#¥PQí`µ&PÉ@vs-fip-current-element-setter7-Define Constant vs-fip-current-element-setter)+ Á6Á246Á297)+ Ë+*S*T *e 4element-setter6Ë23`∞P2±1ÉP4 4Y4Z2É†°`¢°a#¥•PQì`∂'PÉ@vs-fip-copy-state7 !Define Constant vs-fip-copy-state)+ Ï 6Ï246Ï26Ï2z97)+ Ì**S *T 204 4Z2á†°`¢°a£°bR$µPQíµRë`∂'PÉCG7(Define Method forward-iteration-protocol)+ 62442G97 G++ Ò )*+ Úâ+ Ûâ6Ò2i6Ò26Ò26Ò2y6Ò2|6Ú2~6Ú2Ä6Û2É6Û2á∞1±1≤£§•¶ß®x4 G†°`≤#$µPëÇ&CF7Define Method size)+ ˆ6ˆ2j46ˆ242F97 F)+ ˜ )*T 6˜26˜22∞2±Ò04 F†°`¢°a≥$Q%∂Pë∂QëÇ'Caref7Define Method aref++ ˙+ ˚+ ˙6˙2j46˚2Y42ã97:ã/+ ˙**rest *T + ¸å+ ˝)*indexå+ ˛é+ ˇé+ é+ å4Ç6˝26˝26˛2signalindex out of bounds62ã62∞2 í`P ÚaQQ P3±3≤Ò˜≥$ë µ3∂P3≤í04 ã†°`¢°a≥$Q%∂Pë∂QëÇ'Caref-setter7 Define Method aref-setter++ + + 62j462Y42ë97?ë/+ +*ç *T *value+ í+ )*èí+ î+ î+ î+ í4Ç626262êindex out of bounds6 2ë6 2∞2 í`P ÚaQQ P3±3≤Ò˜≥$ë 4aµQ3∂P3≤ÉQ04 4Yë†°`¢°a≥$Q%∂ßPí∂QëÇ(C dimensions7Define Method dimensions)+ 62j462k42ï97ï)+ )*T 62vector6262∞2±2≤Òë04 ï†°`¢°a≥$Q%∂Pë∂QëÇ'@subseq-no-default7 !Define Constant subseq-no-default)+ 62g4Z2ò∞í`±"PÉCÇ7Define Method element)+ 62j46242Ç9default7MÇ0+ **? * + )*ôö+ )*èõ+ ú+ ú+ ú+ ú+ ú62ò6262errorNo such element in %=: %=62No such element in %=: %=4Ç21ı† 1`3±2a2 ÚP†ı≤#32sPQ3¥˜P†ı≤%32sP∂3∑Qr4 Ç†°`¢°a≥$%∂PQíÇ'CÜ7 Define Method element-setter++ !+ " + !6!2j46"26"2Y42Ü979Ü++ $+*? * *ì+ % û+ &û6$26$26%2ùNo such element in %=: %=4Ü6&22 Ú 23∞3±Ò˜ ≤#32ì 4`¥P3µ23±ÉP04 4YÜ†°`¢°a£°b¥%R&∑®PQì∑RëÇ)C7Define Method subsequence++ *+ ,+ *6*2m46,2l4297 8/+ -+* * *+ .)*vü+ 0 )*†+ 1 °+ 2°+ 3 °+ 3ü6-2F6.2 602x602k612!612n632l∞4ë`2 ±2Pí Pa≤4£í¥•&4'3(Qó ¥©*4+3,Qó04 †°`¢°a≥$Q%∂Pë∂QëÇ'ˇ# compilation (2.1) of vecsearch.dylan # produced with the 1.2 version of mindycomp nxöæ<collection-extensions>vecsearch.dylan= vector-searchCfind-first-key7Define Method find-first-key)+:6:2<vector>4<type>4%define-method29startendfailure7)+<-*fail*last * *pred?*seq6<4catch97^/+<)*return-* * * ** +=+>)*sz+?)*+? )*i+@+A97)+<4apply4throw∞°02s4list6=2size6?2<fixed-integer>4element6 ±ê`≤0ëa11QÚ1 Q Qb£c2dReTfUTÛ 3¥0Víë PVÅ T d “ˇˇˇ444<object>∞14325!≤£ëq44†°`≤#$µP¶íÇ'C find-last-key7Define Method find-last-key)+G6G244297)+I-* * * ** 6I497q/+I)*-* * * ** +J +K)* +L)*"+L)*#+M$+N$97)+I44∞°02s46J24 negative?46 ±ê`≤0ëa11QÚ1 Q QbR Òc2d ˇeSf≥UëSTÚ TSÚ 3¥0Víë PVÅ SUc √ˇˇˇ444∞14325!≤£ëq44†°`≤#$µP¶íÇ'ˇ